home *** CD-ROM | disk | FTP | other *** search
/ 8bitfiles.net/archives / archives.tar / archives / commodore-users-of-norman / CUON_14_(11-1984).d64 / disk defaulter (.txt) < prev    next >
Commodore BASIC  |  2019-04-13  |  341b  |  13 lines
  1. 10 I=679
  2. 20 READA:IFA=256THEN1000
  3. 30 POKEI,A:I=I+1:GOTO20
  4. 679 DATA169,188,141,48,3,169,2
  5. 686 DATA141,49,3,169,195,141,50
  6. 693 DATA3,169,2,141,51,3,96
  7. 700 DATA162,8,134,186,76,165,244
  8. 707 DATA162,8,134,186,76,237,245,256
  9. 1000 PRINT"[147]       DISK DEFAULTER ACTIVATED"
  10. 1010 PRINT"  USE RUN/STOP RESTORE TO DEACTIVATE"
  11. 1020 PRINT"      TYPE SYS 679 TO REACTIVATE"
  12. 1030 SYS679:NEW
  13.